SetGaussBoagaParameters Interface

public interface SetGaussBoagaParameters

Module Procedures

private subroutine SetGaussBoagaparametersSystem(system, fuse, override)

Set parameters for Gauss Boaga reference system

Arguments

Type IntentOptional Attributes Name
type(CRS), intent(inout) :: system
integer(kind=short), intent(in) :: fuse
integer(kind=short), intent(in), optional :: override

private subroutine SetGaussBoagaparametersCoord(coord, fuse, override)

Set parameters for Gauss Boaga reference system

Arguments

Type IntentOptional Attributes Name
type(Coordinate), intent(inout) :: coord
integer(kind=short), intent(in) :: fuse
integer(kind=short), intent(in), optional :: override